Top 10k strings from My Secret File (1984)(Mosaic Publishing).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   2 ;"START TAPE":
   2                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
   2                     
   1 T$=P$(P,Q,1
   1 P$        U>
   1 N(P),X(P):
   1 MY SECRET FILE
   1 I$="MY SECRET FILE"
   1 I$="BASED ON THE BOOK       ":
   1 I$="(C) JOHN ASTROP 1982     ":
   1 I$=" PROGRAM (C) PHIL NATHANS 1984":
   1 I$="       MY SECRET FILE      ":
   1 FOR MAX/MIN TESTS(19) **
   1 FILE      V
   1 A$(Q,W,)="":
   1 ;X;" ";P$(X,1
   1 ;I$;"    ";:
   1 ;I$;"     ":
   1 ;'"PLEASE WAIT"
   1 ;"YOU HAVE PRESSED '@'"
   1 ;"WRONG  TRY AGAIN":
   1 ;"WHAT IS YOUR PASSWORD?":
   1 ;"WHAT IS YOUR CODE NO."
   1 ;"UNAUTHORISED ATTEMPT TO ACCESS SECRET FILE":
   1 ;"STOP TAPE"
   1 ;"PUBLISHING"
   1 ;"PRESS ANY KEY"
   1 ;"PRESS ANY KEY TO CONTINUE"
   1 ;"PLEASE CONFIRM 'Y' OR 'N' ";:
   1 ;"PAGE 0 TO RETURN TO CONTENTS";
   1 ;"MY SECRET FILE";
   1 ;"MOSAIC PUBLISHING LIMITED"
   1 ;"DO YOU WISH TO USE A PREVIOUSLY   SAVED FILE?  PRESS 'Y'OR 'N' ";
   1 ;"CONTENTS ";C
   1 ;"   ";A$(P,Q-1
   1 ;"                             ":
   1 ;"                              ":
   1 ;"                              "
   1 9MY VITAL STATISTICS         NHEIGHT(CMS)                 BWEIGHT(KGS)                 @HAIR COLOUR                 @EYE COLOUR                  CNECK SIZE(CMS)              DCHEST SIZE(CMS)             EWAIST SIZE(CMS)             FINSIDE LEG SIZE(CMS)        GSHOE SIZE                   HCOUNT TOES                  9MORE ABOUT ME               @MY BIRTHDAY                 ITIME I WAS BORN(24 HR CLOCK)@WHERE I WAS BORN            @MY SUN SIGN                 @NICKNAME                    JAGE IN YEARS                K     MONTHS                 L    DAYS                    M  HOURS                     @TODAY'S DATE AND TIME       9MY FAMILY                   @MUM'S MUM                   @MUM'S DAD                   @DAD'S MUM                   @DAD'S DAD                   @MUM                         @DAD                         @SISTER                      @SISTER                      @BROTHER                     @BROTHER                     9MY FAVOURITE RELATIONS      @1                           @2     
   1 -X;" ";I$(1
   1 **Y/N KEYPRESS**
   1 **WRITE DATAFILE**
   1 **TAPE I/O ERROR**
   1 **READ KEYBOARD**
   1 **READ DATA**
   1 **PAGE NUMBERS
   1 **OPTION TO RETRY**
   1 **NUMERIC KEYS
   1 **MOVING TEXT FROM RIGHT**
   1 **MOVING TEXT FROM LEFT**
   1 **MOSAIC LOGO**
   1 **LITTLE MAN**
   1 **KEYBOARD REPLY**
   1 **KEY BLEEP**
   1 **HEADINGS**
   1 **EXIT PROGRAM**
   1 **DISPLAY PAGES**
   1 **DISPLAY CONTENTS**
   1 **BASIC CONTENTS
   1 **ASK FOR CODES**
   1 **ALPHA KEY
   1 ***RANDOM MESSAGE***
   1 ***FILE INPUT***
   1 **'RETURN' KEYPRESS**
   1 ** DATAFOR RANDOM MESSAGE **
   1 ** COPYRIGHT **
   1 (I$)>X(L-1
   1 (I$)<N(L-1
   1 "YOUR SECRET FILE RECOVERED FROM"
   1 "YOUR CODES Y/N":
   1 "YOU CAN'T BE SERIOUS?","WANT TO TRY AGAIN?","SOMEBODY'S BOOBED!"
   1 "WRITTEN PERMISSION OF THE"
   1 "WITHOUT MOSAIC PUBLISHING"
   1 "WITHOUT A SIMILAR CONDITION "
   1 "VALUE?";I$;:
   1 "THIS SOFTWARE IS SOLD SUBJECT TO"
   1 "THE CONDITION THAT IT SHALL NOT,"
   1 "TAPE OK. DO YOU WISH TO CHANGE"
   1 "SUBSEQUENT PURCHASER."
   1 "SECRET FILE SAVED TWICE"
   1 "SAVING YOUR SECRET FILE"
   1 "REWIND TAPE TO BEGINNING"
   1 "REPRODUCED IN ANY FORM OR BY" 
   1 "PUBLISHERS, MOSAIC PUBLISHING"
   1 "PLEASE CONFIRM","IS THAT THE TRUTH?","ARE YOU BEING SERIOUS?"
   1 "PLACE YOUR TAPE IN THE CASSETTE RECORDER -  PRESS 'ENTER' WHEN   READY"
   1 "PLACE YOUR FILE IN YOUR CASSETTE RECORDER -     PRESS 'ENTER' WHEN READY"
   1 "PAGE?";I$:
   1 "ONE OF US IS JOKING"
   1 "NO PART OF THIS SOFTWARE MAY BE"
   1 "LIMITED."
   1 "LIMITED'S PRIOR WRITTEN CONSENT"
   1 "INSTITUTIONS WITHOUT THE PRIOR"
   1 "HAVE YOU FINISHED - PRESS 'Y' OR 'N' ";
   1 "FILL IN?";I$;:
   1 "FILE VERIFIED"
   1 "DOES ANYONE ELSE WANT TO USE    THIS FILE 'Y' OR 'N'"
   1 "DO YOU WISH TO VERIFY - PRESS 'Y' OR 'N'";T$
   1 "DO YOU WISH TO SAVE YOUR FILE ON TAPE? - PRESS 'Y' OR 'N'";
   1 "CAN THIS BE TRUE?","UNBELIEVABLE!!!","NOW THE TRUTH!!"
   1 "BY WAY OF TRADE OR OTHERWISE,"
   1 "BEING IMPOSED ON THE"
   1 "BE RESOLD, LENT, OR HIRED OUT"
   1 "ARE YOU SURE?","THAT'S UNUSUAL","IS THAT CORRECT?"
   1 "ANY MEANS BY ANY PERSONS OR "
   1 "AND, IN THE CASE OF RESALE, "
   1 " ARE YOU IN CAPS MODE";T$:
   1 " ";P$(P,Q,2
   1